xtrace	"VRMLX; VRML1.0 data direct import script"
{
	pragma	smooth_with_bound=off;

	viewpoly	30, 0,1,0, 1,1,1;
	ambi	1.0, vrmlx.ar,vrmlx.ag,vrmlx.ab, 0.000, 0,0;

	nvar	vrmlx.nrefl=8;
	nvar	vrmlx.nshdw=8;
	nvar	vrmlx.distr=0;
	cond	0,1, vrmlx.nrefl,vrmlx.nshdw,vrmlx.distr;

	screen	fwid,fwid,fbit;

	var		litpow=1.;
	if (vrmlx.dlit & vrmlx.hlit)
	{
		litpow=0.5;
	}
	if (vrmlx.dlit)
	{
		inf		0,0,1, 0.267, litpow,litpow,litpow;
	}
	if (vrmlx.hlit)
	{
		inf		1,1,1, 0.267, litpow,litpow,litpow;
	}

	nmacro	vrmlx.file_name="vrmlx.wrl";
	vrml	$(vrmlx.file_name);
}